Thirty-six years ago, the graphic function of JR-200 ([Wikipedia](https://ja.wikipedia.org/wiki/JR_(%E3%82%B3%E3%83%B3%E3%83%94%E3%83%A5%E3%83%BC%E3%82%BF) # JR-200)) used a poor personal computer. I'm getting older (laughs). The number of programs published in personal computer magazines is limited, and I think that the graphic function often gave up due to the bottleneck even when trying to port from other models. A program about Yasuko Sawaguchi, who had just made her debut in a magazine called POPCOM (Wikipedia) at that time, was published, but I thought I gave up because I couldn't run it on my personal computer. In my memory, I thought it was a program that displayed Yasuko Sawaguchi's face on a computer graphic. For some reason, I was always worried about it, but I happened to see the magazine at Mercari and bought it. I remembered it on the cover and found it immediately. There was also a picture of the table of contents, so I was able to confirm the content of the article. The price was 3000 yen, which is about 6 times the price at that time.
When I opened the magazine I received, I remembered that time when I read the advertisements and articles, and I missed it very much. There was a feeling of alienation, as the manga explained the program of the world clock. And when I check Yasuko Sawaguchi's program, which is important, there are no graphic instructions at all, and they are almost PRINT and DATA statements. You can't count on old memories. If I did this, I could do it with JR-200 at all. Maybe.
For the time being, I was curious about the content, so I rewrote it in Ruby, which seems easier than BASIC. I entered the DATA
statement on my smartphone with the help of Google's character recognition.
Is it aging 36 years ago? I think that I will post the source (I would appreciate it if you could point out the problem). If you would like to see Yasuko Sawaguchi's profile at that time, please try it. : Smile:
For the time being, the environment that has been confirmed to work is as follows.
sawaguchi-yasuko.rb
#!/usr/bin/ruby
#-*- coding:utf-8 -*-
require 'nkf'
questions = [
"Sain Gappi: ",
"Shushinch: ",
"Shincho,Taiju,B ・ W ・ H no size: ",
"Ekigata,Sizer: ",
"Kazokukousei: ",
"Shumi: ",
"Skina sports: ",
"Toquina Kamok: ",
"Skina Tabemono: ",
"Ittemitai Kuni: ",
"Skina Talent Musician: ",
"Riso type no Dansei: ",
"Kirina Type No Dansei: ",
"Debuno Kicker: ",
"Donna Onna Hitoni Natteiki Taika: ",
"Skinairo: ",
]
data = [
161,100,93,89,104,89,95,95,67,372,372,386,374,62,429,62,386,374,364,
62,389,67,95,102,110,193,214,62,100,102,209,201,62,62,108,93,89,102,
108,89,108,106,67,126,62,374,478,398,62,429,398,384,478,62,386,478,67,
401,401,62,424,424,62,362,413,62,421,62,100,413,475,62,374,396,478,
379,67,372,475,374,478,379,374,475,389,355,367,62,369,364,374,478,374,
475,389,355,367,67,406,413,391,62,391,364,369,364,67,369,364,384,478,
62,374,478,62,391,376,62,406,478,389,398,67,386,458,398,478,62,464,
364,62,411,458,64,62,456,360,379,478,464,408,62,447,67,391,364,391,62,
77,424,364,389,478,62,374,478,62,364,398,456,367,411,62,408,384,469,
79,67,453,360,439,475,62,362,475,461,62,372,429,384,360,391,67,401,
355,357,426,481,461,62,426,355,367,376,475,62,406,478,62,364,357,389,
355,413,364,406,62,398,421,389,364,62,426,408,62,374,478,62,364,364,
411,67,389,403,384,379,406,62,389,478,389,475,62,374,389,478,355,367,
62,421,62,426,408,62,374,478,62,364,450,67,398,478,364,95,374,364,62,
408,367,434,367,62,389,475,406,478,467,458,62,421,62,372,360,406,478,
341,389,355,475,62,406,478,62,453,367,389,355,367,62,389,437,389,398,
67,393,364,374,379,62,374,458,62,391,432,478,406,62,374,472,364,364,
62,408,62,364,472,467,464,62,372,475,411,62,421,62,426,408,62,413,62,
411,461,398,364,67,389,469,62,426,481,475,379,67,133,151,126,159,141,
]
ans = ""
data.each {|a|
b = (300.0*Math.sin(a.to_f/10.0*3.1416/180.0)).to_i
c = b.chr
if c == '#'
puts questions.shift, NKF.nkf("--oc=UTF-8 --ic=CP932", ans),
ans = ""
next
end
ans << c
}
Postscript (2021-01-18): Fixed the link not working properly. Thank you @scivola for your editing request !: bow:
Recommended Posts